From: Camm Maguire <camm@debian.org>
Date: Tue, 16 Jun 2026 01:30:34 +0000 (+0000)
Subject: [PATCH] <short summary of the patch>
X-Git-Tag: archive/raspbian/2.7.1-33+rpi1^2~8
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=94b24f06a06dc27621b787e6148f34e8f8b9af42;p=gcl27.git

[PATCH] <short summary of the patch>

TODO: Put a short summary on the line above and replace this paragraph
with a longer explanation of this change. Complete the meta-information
with other relevant fields (see below for details). To make it easier, the
information below has been extracted from the changelog. Adjust it or drop
it.


Gbp-Pq: Name Version_2_7_2pre28
---

diff --git a/git.tag b/git.tag
index e684561b..76fff234 100644
--- a/git.tag
+++ b/git.tag
@@ -1 +1 @@
-"Version_2_7_2pre27"
+"Version_2_7_2pre28"
diff --git a/h/armhf-linux.h b/h/armhf-linux.h
index 90848b56..5290435a 100644
--- a/h/armhf-linux.h
+++ b/h/armhf-linux.h
@@ -7,6 +7,6 @@
 
 #define NEED_STACK_CHK_GUARD
 
-#define OUTPUT_MACH bfd_mach_arm_9
+#define OUTPUT_MACH bfd_mach_arm_7
 
 #define ADDITIONAL_FEATURES ADD_FEATURE("NO-SIGFPE")
diff --git a/lsp/gcl_dl.lsp b/lsp/gcl_dl.lsp
index c76937b9..880913e1 100644
--- a/lsp/gcl_dl.lsp
+++ b/lsp/gcl_dl.lsp
@@ -10,7 +10,7 @@
 (defun esubseq (s &optional (b 0) (e (length s)) &aux (s (string s)));avoid mdl/memmove call in subseq
   (make-vector 'character (- e b) nil nil s b nil nil))
 
-(defun name-lib (n)
+(defun name-lib (n &aux (n (string n)))
   (when (>= (string-match (load-time-value (compile-regexp "\([^/]*\)$")) n) 0)
     (setq n (esubseq n (match-beginning 1) (match-end 1))))
   (when (>= (string-match (load-time-value (compile-regexp "(\.(so|dylib|dll))$")) n) 0)